From 85f17c0a4df0c94890b9e10af6ea402b24e20a3e Mon Sep 17 00:00:00 2001 From: Jeremy Bryant Date: Thu, 29 Feb 2024 21:47:50 +0000 Subject: [PATCH] ; Use string-join to simplify and make meaning explicit * which-key.el (which-key--butlast-string): Replace mapconcat by string-join. --- which-key.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/which-key.el b/which-key.el index 8fdafbaaaba..3eb27be8f10 100644 --- a/which-key.el +++ b/which-key.el @@ -1592,7 +1592,7 @@ Within these categories order using `which-key-key-order'." (if (stringp maybe-string) (string-width maybe-string) 0)) (defsubst which-key--butlast-string (str) - (mapconcat #'identity (butlast (split-string str)) " ")) + (string-join (butlast (split-string str)) " ")) (defun which-key--match-replacement (key-binding replacement) ;; these are mode specific ones to ignore. The mode specific case is -- 2.30.2